home *** CD-ROM | disk | FTP | other *** search
/ Tabloid Beauties (Italian) / Saranno famos.iso / DATA / DEE.DIR / 00112_Script_112 < prev    next >
Text File  |  1995-03-07  |  545b  |  21 lines
  1. on exitFrame
  2.   put random(100) into x
  3.   if x < 80 then
  4.     
  5.     put the pathname into temp
  6.     if the machinetype <> 256 then
  7.       put Temp & "SOUNDS:031.mov" into Fname
  8.     else
  9.       put Temp & "SOUNDS\031.mov" into Fname
  10.     end if
  11.     set the filename of cast "QT.MOV" to FName
  12.   else
  13.     put the pathname into temp
  14.     if the machinetype <> 256 then
  15.       put Temp & "SOUNDS:030.mov" into Fname
  16.     else
  17.       put Temp & "SOUNDS\030.mov" into Fname
  18.     end if
  19.     set the filename of cast "QT.MOV" to FName
  20.   end if
  21. end